# Metview Macro

uv850 = read("uv850.grib")

u = read(
    param : "u",
    data  : uv850
    )

v = read(
    param : "v",
    data  : uv850
    )

speed = sqrt(u*u + v*v)

plot(speed)
#return speed
#write('wind_speed.grib', speed)

